home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 May / CMCD0505.ISO / Software / Demo / DesktopX / objects / ktekdockv1.dxpack / {EEBF4F87-E846-4522-A525-A5DE458172D9}.DXScript2 < prev    next >
Extensible Markup Language  |  2004-08-24  |  2KB  |  27 lines
  1. <?xml version="1.0"?>
  2. <!--DXScript Data File.  Version 2.0-->
  3. <DXScript>
  4.     <Control clsid="{286DD289-BFFF-4E23-87D4-F31EC94345D0}"><_cx vt="19">6641</_cx><_cy vt="19">6535</_cy><BackColor vt="19">14342874</BackColor><ForeColor vt="19">0</ForeColor><Enabled vt="11">-1</Enabled><BorderVisible vt="11">0</BorderVisible><SelBackColor vt="19">10592673</SelBackColor><SelForeColor vt="19">6579300</SelForeColor><DefaultItem vt="3">-1</DefaultItem><ItemHeight vt="3">18</ItemHeight><ListBackColor vt="19">14342874</ListBackColor></Control><Script><![CDATA['Called when the script is executed
  5. Sub Object_OnScriptEnter
  6.     Control.BackColor = RGB(0,70,120)
  7.     Control.ForeColor = RGB(103,190,255)
  8.     Control.SelectionBackColor = RGB(0,70,120)
  9.     Control.SelectionForeColor = RGB(255,255,255)
  10.     Control.ItemHeight = 14
  11. End Sub
  12.  
  13. Sub Control_OnSelect(item,string)
  14.     If control.ListIndex <> -1 Then
  15.         DesktopX.ScriptObject("wmp").Control.controls.playItem(DesktopX.ScriptObject("wmp").Control.currentPlaylist.item(Control.ListIndex))
  16.         If DesktopX.ScriptObject("lst_tracks").Control.ListIndex = 0 Then
  17.             DesktopX.Object("wmp_playlist_up").State="disabled"
  18.             DesktopX.Object("wmp_playlist_up").LocalStorage("state") = "disabled"    
  19.         End If
  20.         If DesktopX.ScriptObject("lst_tracks").Control.ListIndex + 1 >= DesktopX.ScriptObject("lst_tracks").Control.ItemCount Then
  21.             DesktopX.Object("wmp_playlist_down").State="disabled"
  22.             DesktopX.Object("wmp_playlist_down").LocalStorage("state") = "disabled"    
  23.         End If        
  24.     End If
  25. End Sub
  26. ]]></Script><Globals><Editor><PropPane>0</PropPane><EditorLeft>220</EditorLeft><EditorTop>148</EditorTop><EditorRight>1204</EditorRight><EditorBottom>854</EditorBottom></Editor><Object><LanguageCLSID>{B54F3741-5B07-11CF-A4B0-00AA004A55E8}</LanguageCLSID><ControlCLSID>{286DD289-BFFF-4E23-87D4-F31EC94345D0}</ControlCLSID><ControlObjWidth>197</ControlObjWidth><ControlObjHeight>127</ControlObjHeight><RunState>1</RunState><ManualControlLoad>0</ManualControlLoad><ScriptHostVersion>2</ScriptHostVersion></Object></Globals></DXScript>
  27.